*** empty log message ***

diff --git a/lisp/mail/mail-extr.el b/lisp/mail/mail-extr.el
index c43b0d5a2b03ea6c4d03f5d058034068baa31bc5..dd44507ee57f224c95bb040c9dccc7d3f93d0895 100644 (file)
--- a/lisp/mail/mail-extr.el
+++ b/lisp/mail/mail-extr.el
@@ -850,7 +850,7 @@ consing a string.)"
              (setq char ?\() ; HAVE I NO SHAME??
              )
             ;; record the position of various interesting chars, determine
-            ;; legality later.
+            ;; validity later.
             ((setq record-pos-symbol
                    (cdr (assq char
                               '((?< . <-pos) (?> . >-pos) (?@ . @-pos)
@@ -862,9 +862,9 @@ consing a string.)"
             ((eq char ?.)
              (forward-char 1))
             ((memq char '(
-                          ;; comment terminator illegal
+                          ;; comment terminator invalid
                           ?\)
-                          ;; domain literal terminator illegal
+                          ;; domain literal terminator invalid
                           ?\]
                           ;; \ allowed only within quoted strings,
                           ;; domain literals, and comments